home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / MRAC / Generate / g-cluster2 < prev    next >
Encoding:
Text File  |  1998-08-11  |  633 b   |  33 lines  |  [TEXT/ScoM]
  1. g-cluster2 seed type transp-low transp-high cluster-number
  2.  
  3. 0-based
  4.  
  5. type c = cluster, s = step (melody), r = random
  6.  
  7. (g-cluster2 .34 'c 0 0 3)
  8. => (abcd)
  9.  
  10. (g-cluster2 .34 's 0 3 3)
  11. => (b c d e)
  12.  
  13. Random transposition in range 0 3.
  14.  
  15. (g-cluster2 .34 'c 0 3 3)
  16. => (bcde)
  17.  
  18. (g-cluster2 .34 's -6 6 9)
  19. => (-d -c -b a b c d e f g)
  20.  
  21. (g-cluster2 .34 's nil nil 13)
  22. => (a b c d e f g h i j k l m n)
  23.  
  24. (g-cluster2 nil '(c s c s) -12 12 '(6 5 7 8))
  25. => ((cdefghi) (-f -e -d -c -b a) (bcdefghi) (g h i j k l m n o))
  26.  
  27. (g-cluster2 .3571 'r -12 12 '(6 5 7 8))
  28. => ((e f g h i j k) (m n o p q r) (-j -i -h -g -f -e -d -c)
  29.     (-d -c -b a b c d e f))
  30.  
  31.  
  32.  
  33.